home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / comm1 / turbtp11.lha / TurboTop / TurboTop_Install < prev    next >
Text File  |  1996-04-11  |  3KB  |  138 lines
  1. ;
  2. ; $PROJECT: TurboTop v1.1 - (c) S.Gillibrand 1996
  3. ;
  4.  
  5. (complete 5)
  6.  
  7. (message "I'm a FiRE STARTER\n"
  8.          " TWiSTED FiRE STARTER!\n"
  9.          "\n"
  10.          "TurboTop v1.1\n"
  11.          "Ultimate Top 10 TransAmiga Tool\n"
  12.          "\n\n"
  13.          "Installer\n\n"
  14.          "-+- Digital Design Production 1996 -+-"
  15. )
  16.  
  17. (complete 15)
  18.  
  19. (set cdir
  20.           (askdir
  21.                      (prompt "Where do you want the executable copying?")
  22.                      (help @askdir-help)
  23.                      (default "BBS:Bin/")
  24.           )
  25. )
  26. (complete 25)
  27.  
  28. (set rxdir
  29.           (askdir
  30.                      (prompt "Where is your BBS Rexx Dir located?")
  31.                      (help @askdir-help)
  32.                      (default "BBS:Rexx/")
  33.           )
  34. )
  35. (complete 35)
  36.  
  37. (set docsdir
  38.           (askdir
  39.                      (prompt "Where do you want the guide file copying?")
  40.                      (help @askdir-help)
  41.                      (default "AmigaGuide:")
  42.           )
  43. )
  44.  
  45. (complete 45)
  46.  
  47. (set txtdir
  48.           (askdir
  49.                      (prompt "Where is your BBS Text Dir located?")
  50.                      (help @askdir-help)
  51.                      (default "BBS:Text")
  52.           )
  53. )
  54.  
  55. (complete 50)
  56.  
  57.                      (copyfiles (source "text/TurboTop") (dest (txtdir)))
  58.                      (copyfiles (source "text/TurboTop.ANSI") (dest (txtdir)))
  59.  
  60. (complete 55)
  61.  
  62.                      (copyfiles (source "bin/TurboTop") (dest (cdir)))
  63.  
  64. (complete 60)
  65.  
  66.                      (copyfiles (source "docs/TurboTop.guide") (dest (docsdir)))
  67.  
  68. (complete 65)
  69.  
  70.                      (copyfiles (source "rexx/TurboTop.Trans") (dest (rxdir)))
  71.                      (copyfiles (source "rexx/TTDisplay.Trans") (dest (rxdir)))
  72.  
  73. (complete 70)
  74.  
  75. (message "\n\n Now take a look at the docs please :-)")
  76.                      (run "c/guide docs/TurboTop.guide")
  77.  
  78. (complete 75)
  79.  
  80. (message "\n\n Please edit Main.Rx to include an entry for TurboTop Display\n"
  81.             "Similair To:\n\n"
  82.             "| View Top 10     10 -------- TTDisplay.Trans"
  83. )
  84.  
  85. (set edline
  86.     (askstring
  87.         (prompt "\nPlease Enter Command Line To Run\n")
  88.         (help "")
  89.         (default "ced BBS:Configs/main.rx")
  90.     )
  91. )
  92.  
  93. (run edline)
  94.  
  95. (complete 80)
  96.  
  97. (message "\n\n Please edit your download.trans to activate TurboTop\n"
  98.             "Add this line to your script:\n\n"
  99.             "call 'BBS:Rexx/TurboTop.Trans'"
  100. )
  101.  
  102. (set edline
  103.     (askstring
  104.         (prompt "\nPlease Enter Command Line To Run\n")
  105.         (help "")
  106.         (default "ced BBS:Rexx/Download.Trans")
  107.     )
  108. )
  109.  
  110. (run edline)
  111.  
  112. (complete 90)
  113.  
  114. (message "\n\n Please edit your upload.trans to activate TurboTop\n"
  115.             "Add this line to your script:\n\n"
  116.             "call 'BBS:Rexx/TurboTop.Trans'"
  117. )
  118.  
  119. (set edline
  120.     (askstring
  121.         (prompt "\nPlease Enter Command Line To Run\n")
  122.         (help "")
  123.         (default "ced BBS:Rexx/Upload.Trans")
  124.     )
  125. )
  126.  
  127. (run edline)
  128.  
  129. (complete 100)
  130.  
  131. (message "\n\n\n\n-<*>- TurboTop Is Now Installed - Enjoy! -<*>-"
  132.          "\n-<*>- Thanx For Choosing Digital Design -<*>-\n\n"
  133.          "NOTE: You may need to edit TurboTop.Trans & TTDisplay.Trans"
  134.          " To Suite Your System's Setup!\n"
  135. )
  136.  
  137. (exit (quiet))
  138.